home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / LANG / BASIC / LIB / EVENTSHELL / TESTDRAW / !TestDraw / !Run < prev    next >
Text File  |  1995-10-21  |  1KB  |  22 lines
  1. | !Run Obey file for TestDraw Application
  2. RMensure UtilityModule 3.00 Error Sorry! TestDraw requires RISC OS 3 or later
  3. Set TestDraw$Dir <Obey$Dir>
  4. Set TestDraw$BasicFile <Obey$Dir>.!TestDraw
  5. IF "<EvntShell$Path>"="" THEN ERROR 0 Shell resources not found
  6. IconSprites <Obey$Dir>.!Sprites
  7. WimpSlot -min 352K -max 352K
  8. |Load any modules required now
  9. RMEnsure InterfaceManager 2.00 RMLoad <EvntShell$Path>Interface
  10. RMEnsure InterfaceManager 2.00 Error Couldn't load Interface module
  11. RMEnsure MenuUtils 0.11 RMLoad <EvntShell$Path>MenuUtils
  12. RMEnsure MenuUtils 0.11 Error 0 Error Couldn't load MenuUtils Module
  13. RMEnsure MessageTrans 0.06 RMLoad <EvntShell$Path>MsgTrans
  14. RMEnsure MessageTrans 0.06 Error Couldn't load MsgTrans Module
  15. RMEnsure DrawFile 1.30 RMLoad <EvntShell$Path>DrawFile
  16. RMEnsure DrawFile 1.30 Error Couldn't load DrawFile Module
  17. |RMEnsure WimpExtension 2.18 RMLoad <Obey$Dir>.WimpExt
  18. |RMEnsure WimpExtension 2.18 Error Couldn't load WimpExtension Module
  19. |And check that there is still enough memory!
  20. WimpSlot -min 352K -max 352K
  21. Run <TestDraw$Dir>.!TestDraw %*0
  22.